home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / MRAC / Elements / e-substitute < prev   
Encoding:
Text File  |  1998-10-24  |  923 b   |  23 lines  |  [TEXT/ScoM]
  1. e-substitute new-element old-element sequence 
  2.  
  3. In the context of the MRAC approach this single function represents an important building block and device within many functions in this collection. It is, intrinsically, a most powerful yet simple concept.
  4.  
  5. In essence, the function enables items in a new-element of elements to be directly substituted for items a old-element of elements. In the example below, for example, element 1/16 is associated with and substituted for 0, element -1/16 is associated with and substituted for 1, and so on.
  6.  
  7. (e-substitute
  8.  '(1/16 -1/16 1/32 -1/32)
  9.  '(0 1 2 3)
  10.  (vector-to-list
  11.   (vector-round 0 3
  12.                 (gen-noise-white 12 1.0 .24))))
  13.  
  14. => (1/32 -1/16 -1/16 1/32 -1/16 -1/32 1/16 -1/32 1/32 1/32 1/16 1/16)
  15.  
  16. cfunction is simple to  use
  17.  
  18. (cfunction
  19.  (gen-noise-white 12 1.0 .24)
  20.  '(1/16 -1/16 1/32 -1/32))
  21.  
  22. => (1/32 -1/16 -1/16 1/32 -1/16 -1/32 1/16 -1/32 1/32 1/32 1/16 1/16)
  23.